Amiga Plus 1999 #2/Amiga Plus CD - 1999 - No. 2.iso/System-Boost/Grafik/MetaView/MetaView.install

Text File | 1998-11-08 | 74KB | 3,174 lines

;************************************************
;$VER: MetaView Install 2.5 (25.10.1998)
;Copyright ©1996/97/98 Henk Jonas
;
;   English         by  Henk Jonas
;   Deutsch         by  Henk Jonas
;
;
;
;************************************************

(set @app-name "MetaView V2.5")
(set @sourcedir (pathonly @icon))
(set #wbversion (getversion "libs:version.library"))
(set #wbversion (/ #wbversion 65536))

(if (< #wbversion 38)
  (abort "\n\nAmigaDOS 2.1 or better is needed for this software.")
)

;************************************************
;
; which language should i use?
;
;************************************************

(set #language-number 0)
(if (= @language "deutsch")
  (set #language-number 1)
)
(if (= @language "español")
  (set #language-number 2)
)
(if (= @language "polski")
  (set #language-number 3)
)
(if (= @language "ceská")
  (set #language-number 4)
)
(if (= 2 @user-level)
  (
    (set #language-number
      (askchoice
        (prompt "Please choose your favorite language for the installation")
        (choices "pEnglish" "Deutsch" "Español" "Polski" "Ceská")
        (default #language-number)
        (help @askchoice-help)
      )
    )
  )
)

;************************************************
;
; now the texts for the different languages
;
;************************************************
;
; english texts for the install script
;
;************************************************
;/**/

  (set #YES "Yes")
  (set #NO  "No")
  (set #text_copy "Copy")
  (set #text_skip "Skip")
  (set #text_update "Update")

  (set #text_present
     (cat
        "Henk Jonas\n present:\n\n MetaView\n\n"
        "This programm shows and converts gfx-metafile,\n"
        "uses the 'amigametaformat.library'\n and is SHAREWARE."
     )
  )
  (set #text_programm_update
     (cat
        "I found the MetaView drawer,\n"
        "leave the path in the parent directory\n"
        "of the MetaView drawer for\n"
        "updating an existing MetaView installation."
     )
  )
  (set #text_new
     (cat
        "Please choose the destination for MetaView.\n"
        "I will create a MetaView drawer there,\n"
        "if it does not exist."
     )
  )
  (set #text_drawer
     (cat
        "I am creating the drawer 'MetaView'."
     )
  )
  (set #text_library
     (cat
        "Now I will install the 'amigametaformat.library'."
     )
  )
  (set #help_library
     (cat
        "This library are needed for this programm.\n"
        "It is very importent to install this!"
     )
  )
  (set #text_driver
     (cat
        "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
     )
  )
  (set #help_driver
     (cat
        "the options:\n"
        "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
        "* AMF         : are for output as Amiga Metafile Format.\n"
        "* CGM         : are for output as Computer Graphics Metafile.\n"
        "* EPS         : are for output as Encapsulated PostScript.\n"
        "* GEM         : are for output as GEM Metafile.\n"
        "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
        "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
        "* HPGL        : are for output as HPGL (for Plotters)\n"
        "* AI          : are for output as AdobeIllustrator\n"
        "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
        "* WMF         : are for output as WindowsMetaFile\n"
        "* FIG         : are for output as XFIG file\n"
     )
  )
  (set #text_strip
     (cat
        "Now I will install the stripdriver for 'amigametaformat.library'."
     )
  )
  (set #help_strip
     (cat
        "strip for all renderings on screen, printer and ILBM-output\n"
     )
  )
  (set #text_file
     (cat
        "Now I will install the filedriver for 'amigametaformat.library'."
     )
  )
  (set #help_file
     (cat
        "file for saving as Amiga Meta Format Metafile\n"
     )
  )
  (set #text_cgm
     (cat
        "Now I will install the CGMdriver for 'amigametaformat.library'."
     )
  )
  (set #help_cgm
     (cat
        "CGM for saving as Computer Graphics Metafile\n"
     )
  )
  (set #text_eps
     (cat
        "Now I will install the EPSdriver for 'amigametaformat.library'."
     )
  )
  (set #help_eps
     (cat
        "EPS for saving as Encapsulated PostScript\n"
     )
  )
  (set #text_gem
     (cat
        "Now I will install the GEMdriver for 'amigametaformat.library'."
     )
  )
  (set #help_gem
     (cat
        "GEM for saving as GEM Metafile\n"
     )
  )
  (set #text_ww
     (cat
        "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
     )
  )
  (set #help_ww
     (cat
        "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
     )
  )
  (set #text_dr2d
     (cat
        "Now I will install the DR2D-driver for 'amigametaformat.library'."
     )
  )
  (set #help_dr2d
     (cat
        "DR2D-driver for creating DR2D-Output\n"
     )
  )
  (set #text_hpgl
     (cat
        "Now I will install the HPGL-driver for 'amigametaformat.library'."
     )
  )
  (set #help_hpgl
     (cat
        "HPGL-driver for creating HPGL-Output\n"
     )
  )
  (set #text_ai
     (cat
        "Now I will install the AI-driver for 'amigametaformat.library'."
     )
  )
  (set #help_ai
     (cat
        "AI-driver for creating AI-Output\n"
     )
  )
  (set #text_jmf
     (cat
        "Now I will install the JMF-driver for 'amigametaformat.library'."
     )
  )
  (set #help_jmf
     (cat
        "JMF-driver for creating JMF-Output\n"
     )
  )
  (set #text_wmf
     (cat
        "Now I will install the WMF-driver for 'amigametaformat.library'."
     )
  )
  (set #help_wmf
     (cat
        "WMF-driver for creating WMF-Output\n"
     )
  )
  (set #text_fig
     (cat
        "Now I will install the FIG-driver for 'amigametaformat.library'."
     )
  )
  (set #help_fig
     (cat
        "FIG-driver for creating FIG-Output\n"
     )
  )
  (set #text_programm
     (cat
        "copy programm"
     )
  )
  (set #help_programm
     (cat
        "Now, I will copy the programm."
     )
  )
  (set #text_doc
     (cat
        "copy documentation"
     )
  )
  (set #help_doc
     (cat
        "Now, I will copy the documentation.\n"
        "This textfile is obsolete, use the guide instead."
     )
  )
  (set #text_guide
     (cat
        "Now I will copy the guide for MetaView.\n"
        "What is your favorite language?"
     )
  )
  (set #text_english_guide
     (cat
        "copy English MetaView.guide"
     )
  )
  (set #help_english_guide
     (cat
        "Now, I will copy the English MetaView.guide."
     )
  )
  (set #text_german_guide
     (cat
        "copy German MetaView.guide"
     )
  )
  (set #help_german_guide
     (cat
        "Now, I will copy the German MetaView.guide."
     )
  )
  (set #text_spanish_guide
     (cat
        "copy Spanish MetaView.guide"
     )
  )
  (set #help_spanish_guide
     (cat
        "Now, I will copy the Spanish MetaView.guide."
     )
  )
  (set #text_polish_guide
     (cat
        "copy Polish MetaView.guide"
     )
  )
  (set #help_polish_guide
     (cat
        "Now, I will copy the Polish MetaView.guide."
     )
  )
  (set #text_czech_guide
     (cat
        "copy Czech MetaView.guide"
     )
  )
  (set #help_czech_guide
     (cat
        "Now, I will copy the Czech MetaView.guide."
     )
  )
  (set #text_readme
     (cat
        "copy amigametaformat.readme"
     )
  )
  (set #help_readme
     (cat
        "Now, I will copy the amigametaformat.readme."
     )
  )
  (set #text_arexx
     (cat
        "copy ARexx-Examples"
     )
  )
  (set #help_arexx
     (cat
        "Now, I will copy some ARexx-Examples."
     )
  )
  (set #text_ds
     (cat
        "Do you have DrawStudio installed,\n"
        "and want to im- and export gfx\n"
        "with MetaView?"
     )
  )
  (set #help_ds
     (cat
        "I want to install two ARexx scripts for import and export\n"
        "graphics in DrawStudio with MetaView."
     )
  )
  (set #text_ds_path
     (cat
        "Please choose the DrawStudio ARexx scripts drawer."
     )
  )
  (set #help_ds_path
     (cat
        "I want to install two ARexx scripts for import and export\n"
        "graphics in DrawStudio with MetaView."
     )
  )
  (set #text_ds_import
     (cat
        "copying DrawStudio import script"
     )
  )
  (set #text_ds_export
     (cat
        "copying DrawStudio export script"
     )
  )
  (set #text_pgs
     (cat
        "Do you have PageStream 3.x installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_pgs
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in PageStream with MetaView."
     )
  )
  (set #text_pgs_path
     (cat
        "Please choose the PageStream ARexx scripts drawer."
     )
  )
  (set #help_pgs_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in PageStream with MetaView."
     )
  )
  (set #text_pgs_import
     (cat
        "copying PageStream import script"
     )
  )
  (set #text_ww
     (cat
        "Do you have WordWorth installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_ww
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in WordWorth with MetaView."
     )
  )
  (set #text_ww_path
     (cat
        "Please choose the WordWorth ARexx scripts drawer."
     )
  )
  (set #help_ww_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in WordWorth with MetaView."
     )
  )
  (set #text_ww_import
     (cat
        "copying WordWorth import script"
     )
  )
  (set #text_fw
     (cat
        "Do you have FinalWriter installed,\n"
        "and want to import gfx with MetaView?"
     )
  )
  (set #help_fw
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in FinalWriter with MetaView."
     )
  )
  (set #text_fw_path
     (cat
        "Please choose the FinalWriter ARexx scripts drawer."
     )
  )
  (set #help_fw_path
     (cat
        "I want to install one ARexx script for import\n"
        "graphics in FinalWriter with MetaView."
     )
  )
  (set #text_fw_import
     (cat
        "copying FinalWriter import script"
     )
  )
  (set #text_examples
     (cat
        "Should I copy the example files?"
     )
  )
  (set #text_examples_copy
     (cat
        "copy Examples"
     )
  )
  (set #help_examples_copy
     (cat
        "Now, I want to copy some Examples."
     )
  )
  (set #text_setpatch
     (cat
        "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
        "This Software are published from Amiga Technologie and\n"
        "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
        "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
     )
  )
  (set #help_setpatch
     (cat
        "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
        "You are advised to install this Patch.\n"
        "But if you get a GURU on MetaView-startup you must!"
     )
  )
  (set #text_setpatch_copy
     (cat
        "copy new SetPatch"
     )
  )
  (set #text_tabs_copy
     (cat
        "copy tabs.gadget"
     )
  )
  (set #text_variable
     (cat
        "Should I update the MetaView.path environment variable?"
     )
  )
  (set #help_variable
     (cat
        "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
     )
  )
  (set #text_envarc
     (cat
        "Create ENVARC: variable with path of MetaView"
     )
  )
  (set #help_envarc
     (cat
        "The variable will be stored resetproof in ENVARC:."
      )
  )
  (set #text_env
     (cat
        "Create ENV: variable with path of MetaView"
     )
  )
  (set #help_env
     (cat
        "The variable will be stored for instant use in ENV:."
     )
  )
  (set #text_keyfile
     (cat
        "copy keyfile"
     )
  )
  (set #help_keyfile
     (cat
        "Now I copy the keyfile."
     )
  )
  (set #text_register
     (cat
        "Don`t forget to register!\n\n"
        "Please send $20 or 30,- DM to me:\n\n"
        "Henk Jonas\n"
        "Zionskirchstr. 28\n"
        "10119 Berlin\n"
        "Germany"
     )
  )
  (set #help_register
     (cat
        "Look at MetaView.readme, MetaView.doc "
        "or MetaView.guide for register."
     )
  )
  (set #text_thanx
     (cat
        "Thank you for registering MetaView!"
     )
  )
;/**/

;************************************************
;
; deutsche Texte für die Installation
;
;************************************************
;/**/

(debug #language-number)
(if (= #language-number 1)
  (
    (set #YES "Ja")
    (set #NO  "Nein")
    (set #text_copy "Kopiere")
    (set #text_skip "Überspringe")
    (set #text_update "Erneuere")

    (set #text_present
       (cat
           "Henk Jonas\n presentiert:\n\n MetaView\n\n"
           "Dieses Programm zeigt Vektorgrafiken an\n"
           "und konvertiert diese,\n"
           "benutzt die 'amigametaformat.library'\n und ist SHAREWARE.\n"
           "\n*Die Texte der Installation wurden übersetzt von:*\n"
           "\n*Henk Jonas - [e-mail]*\n"
       )
    )
    (set #text_programm_update
       (cat
          "Es wurde die MetaView-Schublade gefunden. "
          "Belasse den Pfad im übergeordneten Verzeichnis der MetaView-Schublade, "
          "um die existierende MetaView-Installation "
          "auf den neusten Stand zu bringen."
       )
    )
    (set #text_new
       (cat
          "Bitte wähle das Zielverzeichnis für MetaView aus. "
          "Es wird eine Schublade mit dem Namen MetaView erzeugt, "
          "wenn in dem Verzeichnis noch keine vorhanden ist."
       )
    )
    (set #text_drawer
       (cat
          "Es wird die Schublade 'MetaView' erzeugt."
       )
    )
    (set #text_library
       (cat
          "Nun wird die 'amigametaformat.library' installiert."
       )
    )
    (set #help_library
       (cat
          "Diese Bibliothek wird von MetaView gebraucht. "
          "Es ist sehr wichtig, sie zu installieren!"
       )
    )
    (set #text_driver
       (cat
          "Nun werden die verschiedenen Ausgabetreiber für die 'amigametaformat.library' installiert."
       )
    )
    (set #help_driver
       (cat
          "Die Optionen:\n"
          "* Strip       : der Treiber für Bildschirm, Drucker und ILBM-Speicherung\n"
          "* AMF         : für die Ausgabe als Amiga Metafile Format.\n"
          "* CGM         : für die Ausgabe als Computer Graphics Metafile.\n"
          "* EPS         : für die Ausgabe als Encapsulated PostScript.\n"
          "* GEM         : für die Ausgabe als GEM Metafile.\n"
          "* WordWorth   : erzeugt ARexx-Skripte, um sie in WordWorth zu benutzen.\n"
          "* DR2D        : für die Ausgabe als DR2D (für PageStream, DrawStudio...)\n"
          "* HPGL        : für die Ausgabe als HPGL (für Plotter)\n"
          "* AI          : für die Ausgabe als AdobeIllustrator\n"
          "* JMF         : für die Ausgabe als JavaMetaFile (für WWW-Veröffentlichungen)\n"
          "* WMF         : für die Ausgabe als WindowsMetaFile\n"
          "* FIG         : für die Ausgabe als XFIG Datei\n"
       )
    )
    (set #text_strip
       (cat
          "Nun wird der strip-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_strip
       (cat
          "'strip' für alle Ausgaben auf dem Bildschirm, dem Drucker und Speichern als ILBM\n"
       )
    )
    (set #text_file
       (cat
          "Nun wird der file-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_file
       (cat
          "'file' zum Speichern als Amiga Meta Format Grafikdatei\n"
       )
    )
    (set #text_cgm
       (cat
          "Nun wird der CGM -Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_cgm
       (cat
          "'CGM' zum Speichern als Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Nun wird der EPS-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_eps
       (cat
          "'EPS' zum Speichern als Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Nun wird der GEM-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_gem
       (cat
          "'GEM' zum Speichern als GEM Grafikdatei\n"
       )
    )
    (set #text_ww
       (cat
          "Nun wird der WordWorth-ARexx-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-Treiber erzeugt WordWorth-ARexx-Skripte\n"
       )
    )
    (set #text_dr2d
       (cat
          "Nun wird der DR2D-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_dr2d
       (cat
          "'DR2D' zum Speichern als DR2D Grafikdatei\n"
       )
    )
    (set #text_hpgl
       (cat
          "Nun wird der HPGL-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_hpgl
       (cat
          "'HPGL' zum Speichern als HPGL Grafikdatei\n"
       )
    )
    (set #text_ai
       (cat
          "Nun wird der AI-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_ai
       (cat
          "'AI' zum Speichern von Adobe Illustrator Grafikdateien\n"
       )
    )
    (set #text_jmf
       (cat
          "Nun wird der JMF-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_jmf
       (cat
          "'JMF' zum Speichern von JMF Grafikdateien\n"
       )
    )
    (set #text_wmf
       (cat
          "Nun wird der WMF-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_wmf
       (cat
          "'WMF' zum Speichern von WMF Grafikdateien\n"
       )
    )
    (set #text_fig
       (cat
          "Nun wird der FIG-Treiber der 'amigametaformat.library' installiert."
       )
    )
    (set #help_fig
       (cat
          "'FIG' zum Speichern von FIG Grafikdateien\n"
       )
    )
    (set #text_programm
       (cat
          "kopiere das Programm"
       )
    )
    (set #help_programm
       (cat
          "Nun wird das Programm kopiert."
       )
    )
    (set #text_doc
       (cat
          "kopiere Dokumentation"
       )
    )
    (set #help_doc
       (cat
          "Nun wird die Dokumentation kopiert.\n"
          "Diese Textdatei ist veraltet und es sollte statt dessen das Guide benutzt werden."
       )
    )
    (set #text_guide
       (cat
          "Nun wird die Hilfedatei (Guide) für MetaView kopiert. "
          "Was ist Deine bevorzugte Sprache?"
       )
    )
    (set #text_english_guide
       (cat
          "kopiere englisches MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Nun wird das englische MetaView.guide kopiert."
       )
    )
    (set #text_german_guide
       (cat
          "kopiere deutsches MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Nun wird das deutsche MetaView.guide kopiert."
       )
    )
    (set #text_spanish_guide
       (cat
          "kopiere spanisches MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Nun wird das spanische MetaView.guide kopiert."
       )
    )
    (set #text_polish_guide
       (cat
          "kopiere polnisches MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Nun wird das polnische MetaView.guide kopiert."
       )
    )
    (set #text_czech_guide
       (cat
          "kopiere tschechisches MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Nun wird das tschechische Czech MetaView.guide kopiert."
       )
    )
    (set #text_readme
       (cat
          "kopiere amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Nun wird die Datei 'amigametaformat.readme' kopiert."
       )
    )
    (set #text_arexx
       (cat
          "kopiere ARexx-Beispiele"
       )
    )
    (set #help_arexx
       (cat
          "Nun werden einige Beispiele für die Benutzung von MetaView und "
          "der Skriptsprache ARexx kopiert."
       )
    )
    (set #text_ds
       (cat
          "Hast Du DrawStudio installiert "
          "und möchtest Grafiken mittels "
          "MetaView importieren und exportieren?"
       )
    )
    (set #help_ds
       (cat
          "Zwei ARexx-Skripte zum Im- und Export von Grafiken"
          "in DrawStudio mittels MetaView sollen kopiert werden."
       )
    )
    (set #text_ds_path
       (cat
          "Bitte wähle das Verzeichnis, in dem DrawStudio seine ARexx-Skripte aufbewahrt."
       )
    )
    (set #help_ds_path
       (cat
          "Es werden zwei ARexx-Skripte zum Im- und Export von Grafiken "
          "in DrawStudio mittels MetaView kopiert."
       )
    )
    (set #text_ds_import
       (cat
          "kopiere DrawStudio Import-Skript"
       )
    )
    (set #text_ds_export
       (cat
          "kopiere DrawStudio Export-Skript"
       )
    )
    (set #text_pgs
       (cat
          "Hast Du PageStream 3.x installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_pgs
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in PageStream mittels MetaView kopiert werden."
       )
    )
    (set #text_pgs_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den PageStream seine ARexx-Skripte ablegt."
       )
    )
    (set #help_pgs_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in PageStream mittels MetaView kopiert werden."
       )
    )
    (set #text_pgs_import
       (cat
          "kopiere PageStream Import-Skript"
       )
    )
    (set #text_ww
       (cat
          "Hast Du WordWorth installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_ww
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in WordWorth mittels MetaView kopiert werden."
       )
    )
    (set #text_ww_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den WordWorth seine ARexx-Skripte ablegt."
       )
    )
    (set #help_ww_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in WordWorth mittels MetaView kopiert werden."
       )
    )
    (set #text_ww_import
       (cat
          "kopiere WordWorth Import-Skript"
       )
    )
    (set #text_fw
       (cat
          "Hast Du FinalWriter installiert "
          "und möchtest Grafiken mittels MetaView importieren?"
       )
    )
    (set #help_fw
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in FinalWriter mittels MetaView kopiert werden."
       )
    )
    (set #text_fw_path
       (cat
          "Bitte wähle das Verzeichnis aus, in den FinalWriter seine ARexx-Skripte ablegt."
       )
    )
    (set #help_fw_path
       (cat
          "Es soll ein ARexx-Skript zum Import "
          "von Grafiken in FinalWriter mittels MetaView kopiert werden."
       )
    )
    (set #text_fw_import
       (cat
          "kopiere FinalWriter Import-Skript"
       )
    )
    (set #text_examples
       (cat
          "Sollen einige Beispieldateien kopiert werden?"
       )
    )
    (set #text_examples_copy
       (cat
          "kopiere Beispieldateien"
       )
    )
    (set #help_examples_copy
       (cat
          "Es werden einige Beispieldateien kopiert."
       )
    )
    (set #text_setpatch
       (cat
          "Es soll ein neuer SetPatch-Befehl (43.6) in Dein 'c:' Verzeichnis kopiert werden.\n"
          "Dieser Befehl wurde von Amiga Technologie veröffentlicht und "
          "behebt unteranderem einen Fehler in der 'mathieeesingbas.library' in Kick 3.1.\n"
          "Der alte 'c:SetPatch' wird umbenannt nach 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Wähle 'Kopiere', um den neuen SetPatch-Befehl zu installieren, oder 'Überspringe', um ihn nicht zu installieren.\n"
          "Du solltest diesen Befehl installieren.\n"
          "Wenn direkt beim Starten von MetaView eine GURU erscheint, behebt dieser Befehl das Problem!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "kopiere neuen SetPatch-Befehl"
       )
    )
    (set #text_tabs_copy
       (cat
          "kopiere tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Soll die 'MetaView.path' Umgebungsvariable erneuert werden?"
       )
    )
    (set #help_variable
       (cat
          "Die ARexx-Skripte und der MetaView.datatype benutzen diese Variable, um das Programm 'MetaView' zu finden."
       )
    )
    (set #text_envarc
       (cat
          "erzeuge Variable in ENVARC: mit Pfad von MetaView"
       )
    )
    (set #help_envarc
       (cat
          "Die Variable wird resetfest in ENVARC: gespeichert."
        )
    )
    (set #text_env
       (cat
          "erzeuge Variable in ENV: mit Pfad von MetaView"
       )
    )
    (set #help_env
       (cat
          "Die Variable wird für sofortige Benutzung in ENV: gespeichert."
       )
    )
    (set #text_keyfile
       (cat
          "kopiere Keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Es wird das Keyfile kopiert."
       )
    )
    (set #text_register
       (cat
          "Bitte vergiß nicht Dich registrieren zu lassen, wenn Du das Programm öfter benutzt.\n\n"
          "Bitte sende dazu $20 oder 30,- DM an mich:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Deutschland"
       )
    )
    (set #help_register
       (cat
          "Siehe in die Dateien MetaView.readme, MetaView.doc "
          "oder MetaView.guide nach, wie Du Dich registrieren lassen kannst."
       )
    )
    (set #text_thanx
       (cat
          "Vielen Dank, daß Du Dich für MetaView registrieren lassen hast."
       )
    )
  )
)
;/**/

;************************************************
;
; spanisch
;
;************************************************
;/**/

(if (= #language-number 2)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE.\n"
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; polnisch
;
;************************************************
;/**/

(if (= #language-number 3)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE."
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; tschechisch
;
;************************************************
;/**/

(if (= #language-number 4)
  (
    (set #YES "Yes")
    (set #NO  "No")
    (set #text_copy "Copy")
    (set #text_skip "Skip")
    (set #text_update "Update")

    (set #text_present
       (cat
          "Henk Jonas\n present:\n\n MetaView\n\n"
          "This programm shows and converts gfx-metafile,\n"
          "uses the 'amigametaformat.library'\n and is SHAREWARE."
           ;"\n*Translated bla,bla,bla:*\n"
           ;"*Your Name - Your EMail*\n"
       )
    )
    (set #text_programm_update
       (cat
          "I found the MetaView drawer,\n"
          "leave the path in the parent directory\n"
          "of the MetaView drawer for\n"
          "updating an existing MetaView installation."
       )
    )
    (set #text_new
       (cat
          "Please choose the destination for MetaView.\n"
          "I will create a MetaView drawer there,\n"
          "if it does not exist."
       )
    )
    (set #text_drawer
       (cat
          "I am creating the drawer 'MetaView'."
       )
    )
    (set #text_library
       (cat
          "Now I will install the 'amigametaformat.library'."
       )
    )
    (set #help_library
       (cat
          "This library are needed for this programm.\n"
          "It is very importent to install this!"
       )
    )
    (set #text_driver
       (cat
          "Now I will install the different Outputdrivers for the 'amigametaformat.library'."
       )
    )
    (set #help_driver
       (cat
          "the options:\n"
          "* Strip       : the driver for all renderings, like screen, ILBM, printer etc.\n"
          "* AMF         : are for output as Amiga Metafile Format.\n"
          "* CGM         : are for output as Computer Graphics Metafile.\n"
          "* EPS         : are for output as Encapsulated PostScript.\n"
          "* GEM         : are for output as GEM Metafile.\n"
          "* WordWorth   : create ARexx scripts, for use in WordWorth.\n"
          "* DR2D        : are for output as DR2D (for PageStream, DrawStudio...)\n"
          "* HPGL        : are for output as HPGL (for Plotters)\n"
          "* AI          : are for output as AdobeIllustrator\n"
          "* JMF         : are for output as JavaMetaFile (for www-publishing)\n"
          "* WMF         : are for output as WindowsMetaFile\n"
          "* FIG         : are for output as XFIG file\n"
       )
    )
    (set #text_strip
       (cat
          "Now I will install the stripdriver for 'amigametaformat.library'."
       )
    )
    (set #help_strip
       (cat
          "strip for all renderings on screen, printer and ILBM-output\n"
       )
    )
    (set #text_file
       (cat
          "Now I will install the filedriver for 'amigametaformat.library'."
       )
    )
    (set #help_file
       (cat
          "file for saving as Amiga Meta Format Metafile\n"
       )
    )
    (set #text_cgm
       (cat
          "Now I will install the CGMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_cgm
       (cat
          "CGM for saving as Computer Graphics Metafile\n"
       )
    )
    (set #text_eps
       (cat
          "Now I will install the EPSdriver for 'amigametaformat.library'."
       )
    )
    (set #help_eps
       (cat
          "EPS for saving as Encapsulated PostScript\n"
       )
    )
    (set #text_gem
       (cat
          "Now I will install the GEMdriver for 'amigametaformat.library'."
       )
    )
    (set #help_gem
       (cat
          "GEM for saving as GEM Metafile\n"
       )
    )
    (set #text_ww
       (cat
          "Now I will install the WordWorth-ARexx-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ww
       (cat
          "WordWorth-ARexx-driver for creating WordWorth-ARexx-script\n"
       )
    )
    (set #text_dr2d
       (cat
          "Now I will install the DR2D-driver for 'amigametaformat.library'."
       )
    )
    (set #help_dr2d
       (cat
          "DR2D-driver for creating DR2D-Output\n"
       )
    )
    (set #text_hpgl
       (cat
          "Now I will install the HPGL-driver for 'amigametaformat.library'."
       )
    )
    (set #help_hpgl
       (cat
          "HPGL-driver for creating HPGL-Output\n"
       )
    )
    (set #text_ai
       (cat
          "Now I will install the AI-driver for 'amigametaformat.library'."
       )
    )
    (set #help_ai
       (cat
          "AI-driver for creating AI-Output\n"
       )
    )
    (set #text_jmf
       (cat
          "Now I will install the JMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_jmf
       (cat
          "JMF-driver for creating JMF-Output\n"
       )
    )
    (set #text_wmf
       (cat
          "Now I will install the WMF-driver for 'amigametaformat.library'."
       )
    )
    (set #help_wmf
       (cat
          "WMF-driver for creating WMF-Output\n"
       )
    )
    (set #text_fig
       (cat
          "Now I will install the FIG-driver for 'amigametaformat.library'."
       )
    )
    (set #help_fig
       (cat
          "FIG-driver for creating FIG-Output\n"
       )
    )
    (set #text_programm
       (cat
          "copy programm"
       )
    )
    (set #help_programm
       (cat
          "Now, I will copy the programm."
       )
    )
    (set #text_doc
       (cat
          "copy documentation"
       )
    )
    (set #help_doc
       (cat
          "Now, I will copy the documentation.\n"
          "This textfile is obsolete, use the guide instead."
       )
    )
    (set #text_guide
       (cat
          "Now I will copy the guide for MetaView.\n"
          "What is your favorite language?"
       )
    )
    (set #text_english_guide
       (cat
          "copy English MetaView.guide"
       )
    )
    (set #help_english_guide
       (cat
          "Now, I will copy the English MetaView.guide."
       )
    )
    (set #text_german_guide
       (cat
          "copy German MetaView.guide"
       )
    )
    (set #help_german_guide
       (cat
          "Now, I will copy the German MetaView.guide."
       )
    )
    (set #text_spanish_guide
       (cat
          "copy Spanish MetaView.guide"
       )
    )
    (set #help_spanish_guide
       (cat
          "Now, I will copy the Spanish MetaView.guide."
       )
    )
    (set #text_polish_guide
       (cat
          "copy Polish MetaView.guide"
       )
    )
    (set #help_polish_guide
       (cat
          "Now, I will copy the Polish MetaView.guide."
       )
    )
    (set #text_czech_guide
       (cat
          "copy Czech MetaView.guide"
       )
    )
    (set #help_czech_guide
       (cat
          "Now, I will copy the Czech MetaView.guide."
       )
    )
    (set #text_readme
       (cat
          "copy amigametaformat.readme"
       )
    )
    (set #help_readme
       (cat
          "Now, I will copy the amigametaformat.readme."
       )
    )
    (set #text_arexx
       (cat
          "copy ARexx-Examples"
       )
    )
    (set #help_arexx
       (cat
          "Now, I will copy some ARexx-Examples."
       )
    )
    (set #text_ds
       (cat
          "Do you have DrawStudio installed,\n"
          "and want to im- and export gfx\n"
          "with MetaView?"
       )
    )
    (set #help_ds
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_path
       (cat
          "Please choose the DrawStudio ARexx scripts drawer."
       )
    )
    (set #help_ds_path
       (cat
          "I want to install two ARexx scripts for import and export\n"
          "graphics in DrawStudio with MetaView."
       )
    )
    (set #text_ds_import
       (cat
          "copying DrawStudio import script"
       )
    )
    (set #text_ds_export
       (cat
          "copying DrawStudio export script"
       )
    )
    (set #text_pgs
       (cat
          "Do you have PageStream 3.x installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_pgs
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_path
       (cat
          "Please choose the PageStream ARexx scripts drawer."
       )
    )
    (set #help_pgs_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in PageStream with MetaView."
       )
    )
    (set #text_pgs_import
       (cat
          "copying PageStream import script"
       )
    )
    (set #text_ww
       (cat
          "Do you have WordWorth installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_ww
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_path
       (cat
          "Please choose the WordWorth ARexx scripts drawer."
       )
    )
    (set #help_ww_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in WordWorth with MetaView."
       )
    )
    (set #text_ww_import
       (cat
          "copying WordWorth import script"
       )
    )
    (set #text_fw
       (cat
          "Do you have FinalWriter installed,\n"
          "and want to import gfx with MetaView?"
       )
    )
    (set #help_fw
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_path
       (cat
          "Please choose the FinalWriter ARexx scripts drawer."
       )
    )
    (set #help_fw_path
       (cat
          "I want to install one ARexx script for import\n"
          "graphics in FinalWriter with MetaView."
       )
    )
    (set #text_fw_import
       (cat
          "copying FinalWriter import script"
       )
    )
    (set #text_examples
       (cat
          "Should I copy the example files?"
       )
    )
    (set #text_examples_copy
       (cat
          "copy Examples"
       )
    )
    (set #help_examples_copy
       (cat
          "Now, I want to copy some Examples."
       )
    )
    (set #text_setpatch
       (cat
          "I want to copy a new SetPatch (43.6) to your 'c:' directory.\n"
          "This Software are published from Amiga Technologie and\n"
          "fix also a bug on 'mathieeesingbas.library' in Kick 3.1.\n"
          "The old 'c:SetPatch' will renamed to 'c:SetPatch.old'."
       )
    )
    (set #help_setpatch
       (cat
          "Press 'Copy' to install the new SetPatch and 'Skip' for not install.\n"
          "You are advised to install this Patch.\n"
          "But if you get a GURU on MetaView-startup you must!"
       )
    )
    (set #text_setpatch_copy
       (cat
          "copy new SetPatch"
       )
    )
    (set #text_tabs_copy
       (cat
          "copy tabs.gadget"
       )
    )
    (set #text_variable
       (cat
          "Should I update the MetaView.path environment variable?"
       )
    )
    (set #help_variable
       (cat
          "The ARexxScripts and the MetaView.datatype will use the variable for locate the executable."
       )
    )
    (set #text_envarc
       (cat
          "Create ENVARC: variable with path of MetaView"
       )
    )
    (set #help_envarc
       (cat
          "The variable will be stored resetproof in ENVARC:."
        )
    )
    (set #text_env
       (cat
          "Create ENV: variable with path of MetaView"
       )
    )
    (set #help_env
       (cat
          "The variable will be stored for instant use in ENV:."
       )
    )
    (set #text_keyfile
       (cat
          "copy keyfile"
       )
    )
    (set #help_keyfile
       (cat
          "Now I copy the keyfile."
       )
    )
    (set #text_register
       (cat
          "Don`t forget to register!\n\n"
          "Please send $20 or 30,- DM to me:\n\n"
          "Henk Jonas\n"
          "Zionskirchstr. 28\n"
          "10119 Berlin\n"
          "Germany"
       )
    )
    (set #help_register
       (cat
          "Look at MetaView.readme, MetaView.doc "
          "or MetaView.guide for register."
       )
    )
    (set #text_thanx
       (cat
          "Thank you for registering MetaView!"
       )
    )
  )
)
;/**/

;************************************************
;
; now starts the installation
;
;************************************************

(message #text_present)
(set #user-level @user-level)
(set #defaultdir "ram:")
(if (= 1 (exists ("envarc:MetaView.path")))
  (
    (set #defaultdir (expandpath (tackon (pathonly (getenv "MetaView.path")) "/")))
    (set @parentdir
      (askdir
        (prompt #text_programm_update)
        (help @askdir-help)
        (default #defaultdir)
      )
    )
  )
  (
    (user 2)
    (set @parentdir
      (askdir
        (prompt #text_new)
        (help @askdir-help)
        (default #defaultdir)
      )
    )
    (user #user-level)
  )
)

(set @default-dest (tackon @parentdir "MetaView"))

(makedir @default-dest
  (prompt #text_drawer)
  (help @makedir-help)
  (infos)
)

(complete 5)

(copylib
  (prompt #text_library)
  (source (tackon @sourcedir "libs/amigametaformat.library"))
  (dest  "libs:")
  (optional "nofail" "force" "askuser")
  (help #help_library)
)

(complete 10)

(set #driver
  (askoptions
    (prompt #text_driver)
    (choices "pStrip" "AMF" "CGM" "EPS" "GEM" "WordWorth" "DR2D" "HPGL" "AI" "JMF" "WMF" "FIG")
    (help #help_driver)
  )
)

(complete 20)

(makedir "libs:AMF")

(if (IN #driver 0)
  (copylib
    (prompt #text_strip)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-strip.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_strip)
  )
)

(complete 21)

(if (IN #driver 1)
  (copylib
    (prompt #text_file)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-file.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_file)
  )
)

(complete 22)

(if (IN #driver 2)
  (copylib
    (prompt #text_cgm)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-cgm.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_cgm)
  )
)

(complete 23)

(if (IN #driver 3)
  (copylib
    (prompt #text_eps)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-eps.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_eps)
  )
)

(complete 24)

(if (IN #driver 4)
  (copylib
    (prompt #text_gem)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-gem.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_gem)
  )
)

(complete 25)

(if (IN #driver 5)
  (copylib
    (prompt #text_ww)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-ww.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_ww)
  )
)

(complete 26)

(if (IN #driver 6)
  (copylib
    (prompt #text_dr2d)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-dr2d.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_dr2d)
  )
)

(complete 27)

(if (IN #driver 7)
  (copylib
    (prompt #text_hpgl)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-hpgl.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_hpgl)
  )
)

(complete 28)

(if (IN #driver 8)
  (copylib
    (prompt #text_ai)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-ai.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_ai)
  )
)

(complete 29)

(if (IN #driver 9)
  (copylib
    (prompt #text_jmf)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-jmf.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_jmf)
  )
)

(complete 30)

(if (IN #driver 10)
  (copylib
    (prompt #text_wmf)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-wmf.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_wmf)
  )
)

(complete 31)

(if (IN #driver 11)
  (copylib
    (prompt #text_fig)
    (source (tackon @sourcedir "libs/AMF/amigametaformat-xfig.driver"))
    (dest  "libs:AMF/")
    (optional "nofail" "force" "askuser")
    (help #help_fig)
  )
)

(complete 40)

(copyfiles
  (prompt #text_programm)
  (source (tackon @sourcedir "MetaView"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_programm)
)

(complete 50)

(copyfiles
  (prompt #text_doc)
  (source (tackon @sourcedir "MetaView.doc"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_doc)
)

(complete 60)

(set #language
  (askoptions
    (prompt #text_guide)
    (choices "pEnglish" "Deutsch" "Español" "Polski" "Ceská")
    (default (shiftleft 1 #language-number))
    (help @askoptions-help)
  )
)

(complete 61)

(if (IN #language 0)
  (copyfiles
    (prompt #text_english_guide)
    (source (tackon @sourcedir "MetaView.guide"))
    (dest @default-dest)
    (infos)
    (help #help_english_guide)
  )
)

(complete 62)

(if (IN #language 1)
  (copyfiles
    (prompt #text_german_guide)
    (source (tackon @sourcedir "translations/MetaView_deutsch.guide"))
    (dest @default-dest)
    (infos)
    (help #help_german_guide)
  )
)

(complete 63)

(if (IN #language 2)
  (copyfiles
    (prompt #text_spanish_guide)
    (source (tackon @sourcedir "translations/MetaView_espanol.guide"))
    (dest @default-dest)
    (infos)
    (help #help_spanish_guide)
  )
)

(complete 64)

(if (IN #language 3)
  (copyfiles
    (prompt #text_polish_guide)
    (source (tackon @sourcedir "translations/MetaView_polski.guide"))
    (dest @default-dest)
    (infos)
    (help #help_polish_guide)
  )
)

(complete 65)

(if (IN #language 4)
  (copyfiles
    (prompt #text_szech_guide)
    (source (tackon @sourcedir "translations/MetaView_ceska.guide"))
    (dest @default-dest)
    (infos)
    (help #help_czech_guide)
  )
)

(complete 70)

(copyfiles
  (prompt #text_readme)
  (source (tackon @sourcedir "libs/amigametaformat.readme"))
  (dest @default-dest)
  (infos)
  (confirm)
  (help #help_readme)
)

(complete 80)

(copyfiles
  (prompt #text_arexx)
  (source (tackon @sourcedir "ARexx-Examples"))
  (dest (tackon @default-dest "ARexx-Examples"))
  (files)
  (all)
  (infos)
  (confirm)
  (help #help_arexx)
)

(user 2)
(if (= 1 (askbool
            (prompt #text_ds)
            (choices #YES #NO)
            (help #help_ds)
         )
    )
    (
       (set #dspath
          (askdir
            (prompt #text_ds_path)
            (help #help_ds_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_ds_import)
         (source (tackon @sourcedir "ARexx-Examples/DrawStudio_Import.dsrx"))
         (dest #dspath)
       )
       (copyfiles
         (prompt #text_ds_export)
         (source (tackon @sourcedir "ARexx-Examples/DrawStudio_Export.dsrx"))
         (dest #dspath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_pgs)
            (choices #YES #NO)
            (help #help_pgs)
         )
    )
    (
       (set #pspath
          (askdir
            (prompt #text_pgs_path)
            (help #help_pgs_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_pgs_import)
         (source (tackon @sourcedir "ARexx-Examples/PageStream_Import.rexx"))
         (dest #pspath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_ww)
            (choices #YES #NO)
            (help #help_ww)
         )
    )
    (
       (set #wwpath
          (askdir
            (prompt #text_ww_path)
            (help #help_ww_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_ww_import)
         (source (tackon @sourcedir "ARexx-Examples/WordWorth_Import_gfx.rexx"))
         (dest #wwpath)
       )
    )
)

(if (= 1 (askbool
            (prompt #text_fw)
            (choices #YES #NO)
            (help #help_fw)
         )
    )
    (
       (set #fwpath
          (askdir
            (prompt #text_fw_path)
            (help #help_fw_path)
            (default "Rexx:")
            (disk)
          )
       )
       (copyfiles
         (prompt #text_fw_import)
         (source (tackon @sourcedir "ARexx-Examples/FinalWriter_Import.rexx"))
         (dest #fwpath)
       )
    )
)
(user #user-level)


(if (= 1 (askbool
            (prompt #text_examples)
            (choices #text_copy #text_skip)
            (help @askbool-help)
            (default 1)
         )
    )
    (copyfiles
      (prompt #text_examples_copy)
      (source (tackon @sourcedir "Examples"))
      (dest (tackon @default-dest "Examples"))
      (files)
      (all)
      (infos)
      (help #help_examples_copy)
    )
)

(complete 85)

(set #osvernum (getversion))
(set #osver (/ #osvernum 65536))
(set #osrev (- #osvernum (* #osver 65536) ) )
(set #oldpatchvernum (getversion "c:SetPatch"))
(set #newpatchvernum (getversion (tackon @sourcedir "SetPatch43_6/SetPatch")))

(if (AND (> #osver 39) (< #oldpatchvernum #newpatchvernum))
  (if (= 1 (askbool
              (prompt #text_setpatch)
              (choices #text_copy #text_skip)
              (help #help_setpatch)
              (default 1)
           )
      )
      (
        (rename "c:SetPatch" "c:SetPatch.old")
        (copylib
          (prompt #text_setpatch_copy)
          (source (tackon @sourcedir "SetPatch43_6/SetPatch"))
          (dest  "c:")
          (optional "nofail" "force" "askuser")
          (help @copylib-help)
        )
      )
  )
)

(if (> #osver 38)
  (copylib
     (prompt #text_tabs_copy)
     (source (tackon @sourcedir "libs/gadgets/tabs.gadget"))
     (dest  "libs:gadgets/")
     (optional "nofail" "force" "askuser")
     (help @copylib-help)
  )
)

(complete 90)

(if (= 1 (exists ("envarc:MetaView.path")))
  (if (= 1 (askbool
              (prompt #text_variable)
              (choices #text_update #text_skip)
              (help #help_variable)
              (default 1)
           )
      )
    (
      (textfile
        (prompt #text_envarc)
        (dest "envarc:MetaView.path")
        (append (tackon @default-dest "Metaview"))
        (confirm)
        (help #help_envarc)
      )
      (textfile
        (prompt #text_env)
        (dest "env:MetaView.path")
        (append (tackon @default-dest "Metaview"))
        (confirm)
        (help #help_env)
      )
    )
  )
)

(complete 95)

(user 2)
(if (= 1 (exists (tackon @sourcedir "keyfile.metaview")))
    (copyfiles
      (prompt #text_keyfile)
      (source (tackon @sourcedir "keyfile.metaview"))
      (dest @default-dest)
      (infos)
      (help #help_keyfile)
    )
)
(if (= 0 (exists (tackon @default-dest "keyfile.metaview")))
    (message #text_register
       (help #help_register)
    )
)
(if (= 1 (exists (tackon @default-dest "keyfile.metaview")))
    (message
       #text_thanx
    )
)

(complete 100)